home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 007 / programs.arc / GENI.DBA < prev    next >
Encoding:
Text File  |  1986-10-07  |  874 b   |  30 lines

  1. rule(1,"carnivore","cheetah",[1,2])
  2. rule(2,"carnivore","tiger",[1,3])
  3. rule(3,"ungulate","giraffe",[5,2])
  4. rule(4,"ungulate","zebra",[3])
  5. rule(5,"bird","ostrich",[6,5,7,8])
  6. rule(6,"bird","penguin",[9,10,8])
  7. rule(7,"bird","albatross",[11])
  8. rule(8,"animal","mammal",[12,13])
  9. rule(9,"animal","bird",[9,14])
  10. rule(10,"mammal","carnivore",[15])
  11. rule(11,"mammal","ungulate",[16])
  12. cond(1,"it has tawny color")
  13. cond(2,"it has dark spots")
  14. cond(3,"it has black stripes")
  15. cond(4,"it has long neck")
  16. cond(5,"it has long legs")
  17. cond(6,"it does fly")
  18. cond(7,"it has a long neck")
  19. cond(8,"it has a black and white color")
  20. cond(9,"it has feathers")
  21. cond(10,"it swims")
  22. cond(11,"it does fly well")
  23. cond(12,"it has hair")
  24. cond(13,"it does give milk")
  25. cond(14,"it lays eggs")
  26. cond(15,"it eats meat")
  27. cond(16,"it does chew cud")
  28. data_file("geni.dba")
  29. topic("animal")
  30.